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Increased speed and reduced cost in the identification of unknown chemical compounds resulted when General Electric at 
Valley Forge, Pa., put together this system. A TEKTRONIX 4051 and 4907, A. M.S. Solver One interface and software. Perkin- 
Elmer Gas Chromatograph/Mass Spectrometer and a Columbia Scientific digital readout comprise the powerful analysis tool. 
(Courtesy of General Electric, Valley Forge, Pa.) 

A 4051-Based Gas Chromatograph/Mass Spectrometer 
Data System 



by Nick Bazil 
A.M.S. Inc. 

Gas Chromatograph/Mass Spectrometer systems are 
powerful tools for identifying and verifying unknown 
chemical compounds. They can be used to identify a 
pollutant in a water system, for instance, or any chemical 
sample. At General Electric Co. in Valley Forge, PA, a 
Gas Chromatograph/Mass Spectrometer system is in 
place in their analytical chemistry lab; its heart is a 4051 
Graphic System with a 4907 File Manager. The 4051 
handles the data reduction and analysis for the system, 
while the 4907 is the key to quickly matching the 
unknown sample against the library of known com- 
pounds. 

In the past, data reduction and analysis for a Gas 
Chromatograph/Mass Spectrometer combination re- 
quired a minicomputer, a requirement that could add fifty 
to eighty thousand dollars to the cost of a system. The 
high cost made it difficult to justify such data systems. But 



the advent of the powerful 4907 File Manager, coupled 
with the A. M.S. Solver One interface and application 
software package, has considerably reduced the cost of 
such systems. 

The Gas Chromatography Mass Spectrometer system 
began with a 4051 Graphic System and an A. M.S. 
interface; the interface collected data from a Perkin- 
Elmer Gas Chromatograph/Mass Spectrometer system, 
through a Columbia Scientific digital readout connected 
to them. The digital readout unit reads the peaks from the 
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Gas Chromatograph and Mass Spectrometer, sorts the 
data, and performs an intensity count (Fig. 1). 
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Fig. 1. System Configuration. 

In this original system, G.E/s Bob Ross intended to 
simply collect, normalize, graph, and tabulate the data 
locally, taking advantage of the 405 Ts high resolution 
display. (Refer to Figs. 2 and 3.) A time-share system 
could then be used to identify the unknown compounds 
from the mass spectrum run. A given sample in G.E.'s 
analytical chemistry lab could have 50 Gas Chromat- 
ograph peaks, denoting different compounds and 
different intensities or concentrations. 

Visual interpretation and hand data entry with such 
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Fig. 2. Graphic Output of a mass spectra scan. 
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Fig. 3. Normalized and sorted data from the graph in Figure 2. 
complex possibilities restricted productivity in the 
system. Two or three days were typically required to 
obtain a sample identification. The 4907 File Manager 
was then added to the system, and A.MS, added a 



software package to identify compounds locally on the 
4051, using the 4907 as the standard compound library. 
The result is a successful and pleasing system with local aT 
control and vastly increased speed and productivity. V 

System Capabilities 

The system has two primary capabilities. One is its ability 
to collect multiple scans from the Mass Spectrometer, 
then search for known "compounds' to match each scan. 
The other is positive compound identification obtained 
by plotting retention time versus ion current. 

To search for compound matches requires a library of 
standard compounds. The library for this system was 
created by storing the scans from a standard sample kit, 
on the 4907 File Manager. (The fact that this method of 
locally storing a standard library which reflects the 
characteristics of a given system is an added benefit.) 

Searching for compound matches, in its purest sense, is 
quite simple. It requires taking the five most intense mass 
numbers from a scan/then searching through the 
standards library for a match of those numbers. This 
search can require thousands of iterations, but can be 
performed locally, with the 4907 in place, in a fraction of 
the time previously required. 

During a search, the system will display the hit factor (5 
out of 5, 4 out of 5, etc.), probable compound name, 
number, and priority pollutant for each of the run scans^ 
(Fig. 4). Optionally, the system will attach this informa- 
tion to the scan, so the scan can be replotted with the 
found compound information appearing on the graph. 

Plotting retention time versus ion current for any three 
mass numbers is a powerful tool for positively verifying 
the compound identification. With this routine, any three 



ENTER YOUR FILE NAME FOR THE SEARCH F597 

THERE ARE 10 SCANS IN THIS FILE 

SCAN* 3 FOUND 5 OUT OF 5 : COMPOUND- 282N BENZENE 

SCANt 4 FOUND 5 OUT OF 5 : COMPOUND- 283N TOLUENE 

'" SCANt 5 FOUND 5 OUT OF 5 : COMPOUND- 204N XYLENE 

SCAN* 6 FOUND 5 OUT OF 5 : COMPOUND- 295N PHENOL 

SCAN* 7 FOUND 5 OUT CF 5 : COMPOUND- 286N QCRES0L 

SCAN* 7 FOUND 3 OUT OF 5 : COMPOUND- 287N PCRES0L 

SCAN* 8 FOUND 5 OUT OF 5, : COMPOUND- 287N PCRES0L 



Fig. 4. Hard Copy output of the search for compounds on a run 
file. 



TEKniques, the 4051 Applications Library Newsletter, is 
published by the Information Display Group of 
Tektronix, Inc., Group 451, P.O. Box 500, Beaverton, 
Oregon 97077. It is distributed to TEKTRONIX 4051 
users and members of the 4051 Applications Library. 

Ken Cramer 

Patricia Kelley 

Terence Davis 

John Ellis 

Rory Gugliotta 



Publishing Manager 
Managing Editor 
Editor 

Graphic Design 
Circulation 



mass numbers can be selected for plotting during the 
entire run. The desired retention time can then be set to 
tabulate the ratio of intensities between those three mass 
numbers at that retention time (Fig. 5). The three mass 
ratios and the associated retention time verifies the 
probable compound identification. 
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Fig. 5. Graph of retention time versus ion current for three mass 
numbers. 



There are many other useful capabilities in the system, 
such as multiple background correction to compensate 
for column conditions. Also, any amount of mass 
numbers can be deleted from a run before any 
calculations are initiated, to clean up any bad samples 
that may have occurred. Data for each run can be stored 
on the disc for a run library and can be changed or deleted 
at any time. There are also utility commands for 
directories, automatic hard copy and disc to disc 
transfers. 

The key to the successful operation of this system resides 
in the power of the 4907 File Manager coupled with the 
versatility of the Solver One system interface. They have 
made possible a desk-top Gas Chromatograph./Mass 
Spectrometer system, with data reduction and analysis, 
that produces desirable results at one-third the cost of a 
mini-based system. And the two or three days have been 
reduced to about twenty minutes, with a 405 1 and a 4907 
at the system's heart. (Any inquiries concerning the 
GC/MS data system should be directed to A.M.S. Inc., 
Box 873, Lake Elmo, MN 55042, (612)-439-0022.) jg) 
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Science Fair Goes to Space: 4051 Helps 

by Terry Davis 

NASA's space shuttle flights, beginning early in the 
I980's, will transform costly and complex space missions 
into routine, economical operations. The hybrid orbiter 
portion of the space shuttle lands like an airplane after its 
orbiting missions, to be checked out and launched again. 
The orbiter' s huge cargo bay can carry heavy loads into 
space and bring them safely back again, landing on a 
three-mile strip. The many possible uses of such facilities 
stretch the average imagination. One early entry into the 
program, however, is the project of a 16-year old high 
school junior whose scientific interest and imagination 
made him a natural participant in the space shuttle 
project. And the 4051 is helping him on both ends of the 
project. 




Space Shuttle Orbiter and 747 Carrier Aircraft. (Reprinted from 
NASA JSCL-157 (U.S. Government Printing Office: 1977 774- 
457)) 



Beginnings 

Bob Wheeler has long been interested in science. The 
sixth grade found him programming simple computers. 
In junior high his teachers allowed him anextra period to 
do science research, and by the ninth grade he was 
teaching science to seventh grade students. During this 
time, Bob did lots of self-imposed research, along with 
science fair projects. His last science fair project was 
measurement of lunar mountains — which placed fourth 
in the General Motors International Science and 
Engineering Fair at Anaheim, Calif. So research beyond 
the bounds of earth isn't new to him. 

In the tenth grade, three busloads of high schoofstudents 
from the Ogden, Utah, area went to Edwards Air force 




Shuttle Orbiter Carrying Spacelab. (Reprinted from NASA JSCL- 
133 (U.S. Government Printing Office: 1975 671-191/6)) 



Base in Southern California to watch space shuttle tests. 
Bob was in one of those buses and was immediately 
fascinated by the shuttle project, from the expanding tile 
heat shields to the computer-assisted flight. Now Bob is 
sixteen years old and a junior at Weber High School in 
Pleasant View, Utah. He's well on his way to producing a 
programmable microprocessor-controlled experiment 
for one of the early space shuttle orbital flights. 

A parallel factor in Bob's space shuttle involvement is a 
North Ogden neighbor, R. Gilbert Moore. He works at 
Thiokol, the manufacturer of the two solid-fuel space 
shuttle motors. When engineers at NASA decided to offer 
for sale portions of the so-called "get-away space/' the 
empty test flight payload area, Moore took an immediate 
interest. He reserved several of these cannisters, and 
offered one of them to Weber High School, where his son 
is also a student. Dr. James West, Science Coordinator, 
and Earl H. Heninger, Environmental Center Director/of 
Weber School District, teach advanced placement science 
courses at Weber High School. They immediately saw the 
opportunity for Bob to exercise his science and program- 
ming skills, and realize some of his fascination with the 
space shuttle program. With their encouragement. Bob 
started thinking about a project. 

Getting Started 

During June of last year, Bob attended a Space Shuttle 
Mini-Conference at Utah State University. There he and 
the other attendees were told of the requisites for a space 
shuttle project. Bob took particular note of NASA's Ernie 
Ott, who explained, "One of the biggest problems will be 
designing a controller to coordinate the timing and logic 




Bob Wheeler, North Ogden, Utah, hopes to find the origin of 
cosmic rays. To accomplish this mission, he's sending a 4051- 
developed project along on one of the early space shuttle flights. 
At the left is John Hess, Tektronix Sales Engineer, who aided Bob 
in getting the kit to build the controller. 



of the experiments/' Having some experience in digital 
design and in programming, Bob began to think of a 
hardware timer as a project controller. 

Two weeks after the Space Shuttle Mini-Conference, Bob 
was back at Utah State University for a National Science 
Foundation Summer Science Training Program. There 
Bob found a 4051 Graphic System in the math depart- 
ment, and got permission to use it. (Having previously 
read 4051 pamphlets, he was anxious to try his hand.) He 
and a friend, Dale Sather, spent all of their spare time 
during the six-week conference developing programs on 
the 4051. Bob says, "As with most people who are 
introduced to the 4051, we were convinced of its 
capabilities after using its powerful BASIC and excellent 
graphics/' Bob and Dale even worked their class projects 
on the 4051, so they'd have more time for their own 405 1 
application projects. 

One of their projects was a simulation of Apollo from lift- 
off to splash-down; this was a natural with their mutual 
interest in computing and Bob's love of astronomy. 
Working closely, Bob and Dale read up on Apollo, 
researching facts about the mission. Then they designed a 
model, a simulation of an entire Apollo flight. This effort 
taught the two programmers every 4051 BASIC com- 
mand. They even looked at the System Software tape 
code to see how operations were performed, and used 
what they learned to speed up their own graphics 
operations. 

After learning that the 4051 was designed around the 
M6800 microprocessor, Bob wanted to know more about 
the 6800. For the next two months he read about the 6800, 
and studied 6800 Assembly Language. He soon decided 
that the flexibility of the 6800 made it a much better 
candidate for the heart of his project, and it replaced his 
hardware-timer idea. Then John Hess, a friend who 
works at the Tektronix Field Office in Salt Lake City, got 
together with Transera Corporation to donate a 
Motorola 6800 Evaluation Kit. Bob suddenly found 
himself with the. parts he needed to build a 6800-based 
controller. His project was really under way! 

More for the 4051 

Bob was disenchanted with the time necessary to program 
the 6800 using its own hex code, so his next step was 
developing an assembler for the 6800. Again obtaining 
the use of a 405 1 , Bob developed his own assembler; most 
of it was developed in his room at home over Christmas 
vacation. The assembler runs on the 405 1 and, through a 
special ROM, loads the 6800 controller memory with 
assembly-language programs. This lets Bob use the power 
of the 405 1 and the small size of his 6800 processor for his 
space shuttle project. 

Refining the Project 

Bob soon began to feel that simply flying a working 
contrtffllr would be an opportunity missed. He began to 
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think of a project that the processor could control, to 
examine some astronomical phenomena. Bob talked to 
the Electrodynamics Laboratory at Utah State University 
and found them willing to help design a cosmic ray 
detector for the project. So he began to plan a method of 
using his 6800-based controller to gather cosmic ray data. 
In the meantime, he thought there must be a way to 
reduce the size of the 6800 board. He called Motorola 
who put him in touch with Erwin Carroll at the Motorola 
plant in Houston. Carroll is now working with Bob to 
refine his controller for use with the cosmic ray detector. 
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The Motorola 6800 Evaluation Kit has provided Bob with the parts 
for his project's controller. The MIKBUG ROM loads his 
microprocessor with hex code sent over the RS-232 from the 

4051. 

The detector will fly with the experiment, delivering an 
analog signal proportionate to the number of cosmic rays 
striking its surface. This signal will be fed to an analog-to- 
digital converter; the digital equivalent is then relayed to 
the 6800. The 6800 will record the cosmic ray intensity 
data on a small magnetic tape unit, along with the time of 
the sensor readings. This data will then be analyzed, after 
the orbiter returns from its mission. 
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To overcome the frustrations of programming in hex code, Bob 
developed hisown assembler on the4051. Heinputstothe4051 in 
mnemoniccodewhichthe4051 segmentsinto hex, and transmits 
to the 6800 microprocessor in the controller. 



While the experiment is in operation, the space shuttle 
orbiter will be pointed in several directions. Thus readings 
will relate to the many directions, or points in space. After 
the mission, NASA will publish a report showing where 
the orbiter was pointed at any given time. Since the tape 
recorder will have intensity data recorded along with 
reading time, the position information can be easily 
extrapolated. The time and intensity data will be used as 
input to the 405 1 , which will analyze the data and provide 
graphic analysis. The hope is that the graph will show the 
general direction of cosmic ray origin in space. 




Bob indicates where his first ROM will plug into his controller. 
Following this will be other ROMs and some RAMs. When NASA 
flipstheswitchon hiscontroller, it will jumptothefirstaddressin 
this ROM and begin the program controlling his experiment. 

The 6800 can handle several different sensors at once. 
Therefore, Bob plans to fly five or six experiments: he's 
designing additional projects with the help of the Elec- 
trodynamics Laboratory. The versatility of the 4051 
Graphic System will allow Bob to look at the data in 
several different ways. 

"So," Bob says, "the 405 1 is really the main show." It will 
help develop the programs easily and quickly, and will 
convert them to machine language for the 6800. The 6800 
microprocessor, also the 405 Ts heart, will control the 
experiment in flight. (Bob notes that the 6800 will not 
only control his experiment, but will branch to sub- 
routines to service others' experiments.) And after the 
Space Shuttle flight returns, the 405 1 will analyze the data 
and provide a detailed graphic analysis. 

Scheduled for Space Shuttle flight number seven, the 
Weber Highcannister, with Bob's controller, will fly early 
in the 1980's. When it returns, TEKniques will be there to 
cover the conclusion of this ambitious project. 

Editor's Note: John Hess, Tektronix Sales Engineer at 
Salt Lake City, brought the achievements of Bob Wheeler 
to the attention of TEKniques' staff and arranged for an 
interview in Salt Lake City with Bob and his father, Dr. 
Bob Wheeler. JgjD 



Modeling and Reporting as Process Control Monitor 



by Bob Cook 

Previous issues of TEKniques have described the new 
TEKTRONIX Modeling and Reporting software. A 
specific application was described, along with a descrip- 
tion of the capabilities and uses of the software package. 
The following is an example of a typical Modeling and 
Reporting installation in a process control environment, 
in this case, a sewerage treatment facility. 

The agency in question resulted from the consolidation of 
nine city and 26 independent sanitary districts, and is 
responsible for all sewers and sewerage treatment within a 
growing county. The facility handles half of the waste in 
the county, and currently processes an average of 10 
million gallons of wastewater daily. Plant capacity is 20 
million gallons per day, and is expected to grow to 60 
million gallons by the year 2000. 

Applying the Modeling and Reporting System 

When the wastewater (sewerage) comes to the plant, it is 
full of suspended solids that must be removed; several 
steps are used to do this. After initial filtering and settling, 
the wastewater is placed in aeration basins, where 
microorganisms are introduced. These organisms digest 
the suspended organic solids, producing solids that will 
settle. The settled solids are referred to as sludge. 

After the biological treatment stages, the wastewater 
passes to the chemical purification stages. There, 
chemicals such as lime and aluminum sulfate are in- 
troduced. These chemicals combine with chemical 
pollutants like phosphorus, causing them also to settle 
out as sludge. 

In the next stage, the sludge by-products are thickened, 
dewatered, and incinerated. The remaining processed 
water passes through a final filter, and is then chlorinated 
and discharged into a nearby river, cleaner than the river 
itself. 

The key aspect of this operation is sludge production and 
processing; it must be carefully monitored and controlled. 
The Modeling and Reporting system analyzes sludge and 
phosphorus removal throughout the several processing 
stages. 



Readings for flow in the tanks are taken every midnight. 
The percentage of solids in the flow is checked every two 
hours. Without Modeling and Reporting, these readings 
were jotted down by hand on a form. Analysis was done 
manually when it was deemed necessary. Besides being 
subject to manual calculation errors, these analyses took 
as long as 30 hours to produce. As a result, they were done 
only when absolutely necessary. 

At the same time, the treatment process is slow to respond 
to corrections. This makes it difficult to maintain stable 
operation without readily-available analysis of current 
status and trends. -Modeling and Reporting provides an 
easy-to-use method of obtaining the needed analysis 
whenever desired, to help maintain the stable process. 
Graphics provides a superior way to visualize and track 
process trends. 

With Modeling and Reporting, readings are easily 
entered into the system daily; analysis is available in a 
matter of hours. Reports are presented in neat hard copy- 
output, instead of the old handwritten form. Modeling 
and Reporting improves the operation by providing 
timely decision data, with great time savings and without 
manual error. 

Material savings from the stabilized process have not yet 
been quantified, but the time savings is easily calculated. 
The analysis that takes 30 hours by hand can be done in 
four with Modeling and Reporting. Using this calculation 
alone, at a standard hourly labor rate, the Modeling and 
Reporting System could pay for itself in less than 18 
months. Plus, the graphic reports are quickly produced 
and easily interpreted. 

The same kind of process control could be used in new 
water processing plants, or such heavy industries as 
electroplating, casting, chemical laboratories, and pulp 
and paper plants. They could also benefit from the time 
and money savings, coupled with enhanced performance. 
They're all made possible by the 4051 Graphic System, 
with the powerful Modeling and Reporting Software 
package. Jgjfc 
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TEKniques a Winner! 

TEKniques recently took part in the annual Com- 
munications Competition sponsored by the Society for 
Technical Communications. We entered the regional 
competition sponsored by the Willamette Valley Chapter 
of the society, and came back with the first place position 



in our category. Our entry has been forwarded to the 
national competition, where it will face other entries from 
electronics, medicine, forestry, and other industries. 



We're very pleased with this achievement. Our winning 
entry would not have been possible without your in- 
teresting applications and tips, so we all share in this 
success. Thank you for the help! Jg) 
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* Editor's Note 

) Catalogs and Back Issues 

Did you miss an issue of TEKniques, from Volume 1 or 2? 
Or perhaps you haven't yet gotten your copy of the 405 1 
Applications Library Program Catalog. We have 
catalogs and back issues of TEKniques on hand in the 
TEKniques office. If you'd like to receive a catalog, or 
have been wanting to find a copy of a previous issue of 
TEKniques, drop a note to the Applications Library 
serving you; Library addresses are located at the back of 
each TEKniques issue. 

Program Tip Exchange 

Send in your programming tip. Any one of the following 



4051 Applications Library programs* will be yours when 
it's published. Simply jot down a brief description of the 
function, the code and your choice of program. Mail it to 
the 4051 Applications Library serving you; Library 
addresses are listed at the back of each TEKniques issue. 



51 00-0101/0 


51 00-5503 


51 00-0702/0 


51 00-7002 


5 1 , 00-07 15/0 


51 00-8006 


51 .00-1401 


5 1 , 00-9505 ■ 


51 / 00- 1402/0 


51,00-9511 


51 00-5401,0 


51 00-9521 


*Documentation and listing only. 



Business Applications Contest Winners 
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The winners have been selected for the TEKniques 
business applications contest. The five winning entries are 
contained in the new abstracts section of this issue by 
TEKniques; the winners are listed below. 



Fourth Place: 



Mallory M. Green also took the fourth 
place honors with TIME SERIES II. It. 
like BARGRAPH II. is useful for 
business and general applications; both 
use the same data format, so they work 
interchangeably. Refer to Abstract No. 
51.00-0906/0." 



First Place: 




Second Place: 




Dr. P.C. Holman has contributed 
programs and applications to TEKni- 
ques in previous issues. His winning 
entry is a collection of algorithms for 
business and accounting. See Abstract 
No. 51 00-0904 0. 

Robert S. Pilkington, of A.T. & T. Long 
Lines, Bedminster, N.J. contributed a 
program entitled T" Axis Graphs— 12 
Month Format. The program is very 
well documented and flowcharted, and 
makes excellent use of negative 
numbers. See Abstract No. 51,00- 
0905 0. 




R.J. Reimann is an Assistant Professor 
in the Department of Physics and 
Engineering as Boise State University, 
Boise, Idaho. His entry, Regular Plot, is 
a general graphics program developed 
for industrial market analysis. Previous 
contributions to TEKniques include the 
Graphics Demonstration for 
Astronomy and Physics. His prize 
winner is described in Abstract No. 
51,00-0908/0. 



Congratulations to all, and a big "Thank You!" to all who 
entered. JgjD 



Third Place: 




Mallory M. Green, a computer 
specialist with the U.S. Department of 
Housing and Urban Development, 
Washington, D.C. has also contributed 
to previous issues of TEKniques. His 
third place winning entry is 
BARGRAPH II, which generates 
professional horizontal or vertical bar 
graphs in a simple interactive manner. It 
is further described in Abstract No. 
51/00-0907/0. 



Programming 
Tips 




Off-Line Plotting 

by Carl Dawson 
Tektronix, Inc. 

Off-line plotting speeds program execution and frees the 
4051 for other tasks. During program run time, it's 
quicker to send the graphics commands to tape instead of 
sending them to the plotter with the attendant waiting 
while they are plotted. After the graphics data is 
generated and sent to tape, you can plan the plot files back 
from a TEKTRONIX 4924 tape unit to the 4662 Plotter. 
This technique is especially useful when producing 
multiple plots, or when several users share a single plotter. 

DAB and GDU 

Off-line 4662 plot files require Data Byte Commands 
(DAB) and Graphic Display Units (GDU). DAB com- 
mands program the plotter by passing the command as 
part of the data. As a quick reference, the following is an 
abridged list of DAB commands.: 



MOVE 


M 


DRAW 


D 


PRINT 


P 


HOME 


H 


ALPHAROTATE 


R 


ALPHASCALE 


S 


ALPHARESET 


A 


PROMPT LIGHT 


T 



User Data Units are defined by the WINDOW, VIEW- 
PORT, ROTATE and SCALE commands. Four BASIC 
keywords transform User Data Units into device depen- 
dent GDU's: MOVE DRAW, RMOVE and RDRAW. 
Thus a MOVE @1:X,Y will send the transformed X,Y 
coordinate to device 1. 

To send transformed coordinates to tape requires specify- 
ing the secondary address (MSA). » If a secondary address 
is omitted, as it is in MOVE@l:X,Y, the 4051 
automatically generates a secondary address that cor- 
responds to the keyword. The previous command, 
therefore, internally looks like MOVE @1,21:X,Y. This 
default secondary addressing can be overridden. 2 MOVE 
@1,20:X,Y will actually execute a DRAW since the 
secondary address of 20 tells the peripheral device to 
DRAW. 

If the default secondary address for MOVE (MSA=2i) is 



( 



overridden with the secondary address for the PRINT 
operation (MSA=12), then MOVE@U2:X,Y will print 
the transformed coordinates on the plotter surface 
beginning at the current pen position. To carry this 
example one step further, a MOVE@33, 12:X,Y will print 
the transformed coordinates to the current file on the 
internal tape drive. 

There is one limiting factor. The User Data Units 
specified as X,Y coordinates of the MOVE and DRAW 
statements must lie within the boundaries of the 

WINDOW coordinates. When a draw is clipped, either 
none or two X,Y coordinate pairs will be issued by the 
4051. Consequently, the coordinates of points outside the 
window will not be consistent with the character com- 
mands being printed by the user on the tape. 

Plbt File Format 

Plot files, therefore, contain the appropriate plotter DAB 
commands and their associated data. Each value 
associated with a particular DAB command must be 
separated by a valid delimiter (space or comma) and each 
command must be followed by a valid terminator which 
may be one of the following: 

1. An ETX byte (Control C) 

2. A CR, comma, or space when the data sent to the 
Plotter is numeric and all expected data values 
have been received. 



Two other terminators are valid in other modes of 
operation, but we'll ignore them since they aren't usable in 
the "off-line" plotting described here. 

Building the Plot Files 

For off-line plotting, all plotter commands must be in the 
DAB format and all graphic coordinates in GDU's. A 
sequence of two BASIC statements specify first the DAB 
command followed by the transformed coordinate: 



( 



»A complete list of secondary addresses is on page B- 18 of the 4051 
Graphic System Reference Manual. 

Secondary addresses can be suppressed. PRINT @1,32:"H" sends the 
character "H" and a carriage return to the plotter without sending a 
secondary address. In this case the plotter treats it as a command 
(HOME). Complete information on I/O addressing can be found in the 
4051 Graphic System Reference Manual beginning on page 7-9. 



) 



( 



} 



290 PRINT 033: "MM 
218 HOUE *33,12:X,Y 



J 



Line 200 prints the DAB character for MOVE to the tape 
file; the automatic carriage return (CR) is suppressed. If 
the CR were allowed, it would terminate the DAB 
command before the coordinates were specified. Line 210 
transforms the X,Y coordinate into GDLTs and prints 
these values to the tape file. In addition, a CR is generated 
by the print operation in line 210 thereby properly 
terminating the DAB command. 

The following example builds a plot file containing a sine 
wave and a title. Note that all coordinates of the MOVE 
and DRAW commands lie within the WINDOW boun- 
daries. 



198 REM - PROGRAM TO BUILD PLOT FILE 


110 IHIT 




120 WIHOOM 8.2SPI.-1, 1 




13C VIEWPORT 8, 158,8, 168 




148 FIND 1 




138 REM - "MOUE" co««and 


sequence 


168 PRINT #33:"M"1 




178 MOUE #33,1218,8 

188 FOR X-8 TO 2<PI STEP 




21PI/188 


198 REM - 'DRAW connand 


•■quenct 


288 PRINT i33:*D'J 




218 DRAW f33,12:X,SIN<X) 




228 NEXT X 




238 REN - "HOUE" cownand 


*tauenc« with GDU coordinate 


248 PRINT i33:-H38,98' 




238 REH - "PRINT- - co«*and *eautnct 


268 PRINT #33:"PSINE HAUEC" 


278 REH - "HONE" 




288 PRINT 833: 'N" 




298 CLOSE 




388 END 





Since a CR is considered valid data by the print "P" 
command, note that the ETX (X ,r ) character was used as 
the terminator in line 260. 

Creating Axes 

The AXIS command cannot be used to generate axes in a 
plot file. The AXIS command causes the 405 1 to generate 
a series of moves and draws, sending this information to 
the plotting device with the appropriate secondary 
addresses. Therefore, the AXIS command has to be 
interpreted by the 4051 as it is being executed. 

However, axes can be generated in a plot file by writing a 
short subroutine which performs the same functions as 
the BASIC keyword "AXIS". This code is discussed in the 
PLOT 50 Introduction To Graphic Programming in 
BASIC in the section entitled "AXIS: Without Axis 
Command." 



Off-Line Plotting 

The plot file tape can now generate a graph on the plotter 
without the 405 1 . Connect a 4924 tape unit to the Plotter 
through the GPIB. Set the Plotter for "LISTEN ONLY" 
and "DA B" modes. That is, the four hexadecimal switches 
on the rear panel of the Plotter labeled "A B C D" should 



besetto"l CO 1." Put the 4924 tape unit in manual mode 
by releasing the ON LINE switch (ON LINE button 
should be up, not depressed). Rewind the plot file tape by 
pressing the REWIND button and locate the desired 
file(s) with the SKIP FORWARD or SKIP BACK 
buttons. Start the plot transfer by pressing the TALK 
button on the 4924. When the end of file is encountered, 
the 4924 will stop and the plot can be removed from the 
4662 Plotter. 



Off-Line Plotting Monitored 

You may wish to prompt the operator to change paper on 
the plotter. The following small program will enable the 
4924 to signal the 4051 when it has finished transmitting 
to the plotter. The 4924 talks directly to the plotter which 
frees the 4051 to execute any program not requiring the 
GPIB. When the end of file is detected by the 4924, it 
generates a service request (SRQ) and sets its error 
number to 12. The 405 1 detects the SRQ and signals the 
operator, (ON SRQ THEN ...). 

For this method to work, the plotter must be set for both 
MSA and DAB operations by setting the hex switches on 
the back panel to "1 1." The 4924 must be placed ON 
LINE by depressing the ON LINE button. The program 
sets up the transfer from 4924 to plotter, waits for the 
SRQ, then prompts the operator to remove the plot. 



188 REM MONITORED OFF-LINE PLOTTING 

11C INIT 

128 ON SRQ THEM 308 

139 REH 4924 if dtvice 2i plot on file t 

146 FIND f2: 1 

158 REM Set up "peripheral to peripheral" transfer 

168 REM Note '*" »eti 4851 off the GPIB 

178 U&YTE '-466,122,33: 

188 REM Wait (or execute a BASIC protran) 

198 U*IT 

208 REM Continue, end of file detected 

218 PRINT "GGG Pleast renove plot GCC" 

228 END 

588 REM SRQ nrvice routine 

518 POLL I,J»2 

328 IF 1-1 THEM 339 

338 PRINT "GGPOLL ERROR" 

348 STOP 

558 REM Get tape unit error number 

568 INPUT t2,38:E 

378 IF E<>12 THEN 618 

388 REM Untalk I unlitten peripherals 

398 MBYTE #93,63: 

688 RETURN 

618 PRINT "GCGTAPE ERROR NUMBER "|E 

628 STOP 



Keyed File Access on the 4907 

by Jack Gilmore 
Tektronix, Inc. 

The 4907 brings a random access file and record 
capability to the 405 1 . Although 4907 files are accessed by 
name, random access of records still requires the use of 
cardinal numbers (I, 2, ..., number of records allocated). 

Sometimes it would be more desirable to access a record 
based upon an alpha string such as a name. Non- 



sequential groups of numbers, such as a social security 
number, could make a desirable access key. Some 
combination of the two, such as street address, might also 
be useful. 

A method that constructs and searches symbol tables in 
compilers and assemblers is "hashing/' The hashing 
method maps the set of keys into a restricted range of 
numbers or "hash codes." In our case, hashing transforms 
the key field such as a last name into a numeric value 
representing 1 number of records. 

Linear Hashing 

The hashing function is chosen so that: 

1 . The computation of the hashing function is rapid; 

2. The mapping of all keys to hash codes is uniformly 
distributed over the range of hash codes. 

These codes are then used as record numbers to access the 
data file in a random fashion. 

To enter a new record, the following procedure is used: 

1. The hashing routine computes a record number in 
the file from the key. 

2. If the key-field (first) in that record has the 
initialized value (alpha-blank or numerical-zero), 
the key, followed by the rest of the data for that 
record, is written at that position. 

3. If the key-field is the same as the key for the record 
being inserted, the record already exists. 

4. If the key-field is different than the key for the new- 
record, the hash code (record number) is in- 
cremented by one. If it's greater than the number of 
records in the file, it is reset to one. A check is made 
to see if the record numbers have completely 
wrapped around once. If so, the file is full and error 
action is taken. If not, steps 2 through 4 are 
repeated. 

To recover a record takes a similar operation: 

1. The hashing routine computes a record number. 

2. If the key-field (first) is blank or zero, then the 
record doesn't exist. 

3. If the key-field is the same as the key for the record 
for which you are searching — Eureka! —it's been 
found. 

4. If the key-field is different, the record number is 
increased and tested in the same manner as 
inserting a new record. Steps 2 through 4 are 
repeated and an error return is taken if the record 
does not exist (exhaustive search). 



The following routines implement keyed file access for an 
alpha key. 



Sample program to test 



4OC0 PEfl INITIALIZE r\L£ STRUCTURE 
•»Oit, -EM Kv IS r^E NUll^t" :f *e:-,si.s 
'KCO hEM >8 IS 'HE nEZQi'b lEnOTh 



•♦.080 ,.;lu c 
1O90 >•£?! 
4 100 hZn 



• II 70 
•tl9C 



ftCUTIEME 
HA3M roDe 
INPUT NEr 



Set ail ke vs to hlank so we can 
teil thai a record is unused 



For hest remits modif\ and test to 

make sure this routine produces uniform/ \ 

distrmuted numbers tor your particular 

4 
Key = Length - £, ASCt k$(l)*2 ~ : i-l , 



«Ew rvE .^r. 



u ncsui- -ii.'o 










Calculate hash 


.j * .=n 










Sa\e it to compare for exhaustive search 


■j '»:-»■* + '. 










\umne r of record entered 


c » E h c, * i , f, : f * 










Read <**• i 


: -F ► * • • r HtN 4 .->••: 










Check for emptv record 


• ;;.;T 










Success, fuuna empt\ slot 
Sope. so tr.\ next record 


»: -n: ■• ; 










Sumner of extra reacts 


". '"..'.''] , 1^^. A '"*, ' 










Is ke\ wrapped around once' 


:• =->- ' ' " C U " U .V' 


)/T • 


Prt 


Ml 


CGI 


•a recverv technique could he used 












Clwck for \e\ o-verriov. 


* *. = ; 










if so. reset Ke-. 


;• l'j t j 4_> 










Get ne xi record 














-• iCz..k 4. i . 










Hasn ke\ 

Save Kev 'or exhaust is e search 


j -€«£< #1 .v ;- * 










Read kev from tile 


j If -» M mE(V 4 4 30 






















Compare \e\s 










Found it ' 


*?*«> ^ ANi . r - 4 . . ; H 


N •'■ 


j r ■/ 






Cheek next record 


o ftiNT 'r.£c.:a:i L'OES not 










Check for niank record or exhaustive search 


o. >:*of 




j 


\f 


ore 


sophisticated recovery could he used 


>- n. = lsO 'mEN 4 4v0 










Check for kev oser/lo* 


» = 1 










Reset kev 


uC f 4 400 










Get next record 



( 



The following are advantages of the linear hashing 
method: quick access to a record, not having to read in the 
entire record to check if it's the right one, no tables to keep 
in memory, the routines. to implement the technique are 
small. 

However, once the file is created and initialized, it cannot 
be expanded; to do so would change the mapping of keys- 
to-record placement. This could be a major disadvantage 
in some applications although a program could be written 
to copy a file to a larger one, recomputing record 
placement in the process. 

Another drawback is this: as the file fills up, the average 
number of reads to locate the desired record goes up 
dramatically, as shown in the following graph: 
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Non-Linear Hashing 

Non-linear hashing is another method of implementing 
keyed file access. It overcomes some of the linear hashing 
constraints/ although there are tradeoffs. Non-linear 
hashing allows file expansion, and the records within the 
file do not have to be pre-written with null keys. 

However, the routines are more complicated. A table 
containing record numbers must be retained in memory 
when the file is open and saved on the disc when the file is 
closed. When adding to a file, an entire record has to be 
read and modified. This technique has another perfor- 
mance characteristic demonstrated in the following 
graph: 



fSON-LXIHOR MASMXNO DISC 




FILE LENGTH/NO. OF HASH BUCKETS 



If the file contains a large number of records, the hash 
table length could become unreasonably large to decrease 
the average number of accesses per read. 

The following diagram illustrates the data structure of 
non-linear hashing. 



HASH TABLE 



Last Record in Chain 



(: 



Key | 



RECORD 

1 



Key 



Key 



Key 



Key 



7 Key 



^mpty| 



The following routines implement non-linear hashing. 
Although the hash tables are stored as the first record in 
the file, they could be stored in a separate file. If stored 
separately, the hash table should be chosen independent 
of the record length. Each entry could also be in a separate 
record, so the entire hash table needn't be in memory at 
one time. This would require one additional disc access. 



;..'10 ■ 
..'-0 
..JO i 



■i r e ,j ra ,en?;n 



.;;j;:rc rasn rucK 



^u.'ve J.S c.near hasmn? 



•' -::e :: to disc 




Main rrofam is resrcnj-.-ie 'or writing entire 
-vc ."-j ana incrementing \ j 




Hasn rucet is tun. _.-_•_• ..nk to end of chain 
KJ < ;™ to tne next -ecoru 




£"•'."• procedure 




Ha\e we round the ena .. • chain' 




No. ^nain iji.ni to next r ecorJ 




Warning ' This must re expanded to statement the 


t reads 


anj writes tne entire v.vj 'or each record stru 


dure 


Statistic \ariahie <.ma\ "v Jeieiedi 




Hash the <e\ 




c hecx :he hash bucKei 




Index into the hasn lar.e 




Rcjt.i ."it- record 




n it tne nam one ' 





With the above information, tradeoffs can be made 
between linear and non-linear hashing for any number of 
records. To calculate the number of hash buckets for any 
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size file as a function of the number of disc accesses, the 
following empirical equation is given: 



where B is number of hash buckets 
S is number of records 
N is number of reads 



2*N 



For linear hashing, the following empirical equation 
seems to work: 



2(1+N)S 

N 



where A is allocated size 
A S is number of records used 

N is number of reads 



Packing Integers 

by Ted Webber 

Laurie, Montgomerie & Pettit Pty. Ltd. 
Sydney, Australia 

The following program saves memory when you re 
storing integers consisting of six digits or less. The 
integers are packed into one real number, complete with 
signs, in the format: 

C = ±A.nB where A and B are each 6 (or less) digit 
integers and n = 0, 1 or 2 to indicate the sign of B 

The sign of B is stored as the first digit after the decimal 
point in C so that = - 1 = 0and2 = +. FNB encodes Nl 
into the integer part of N. FNC encodes N2 into the 
decimal part of N. FND decodes N2 and FNE decodes 

Nl. 

The first routine generates two arrays of 500 random 
integers, which are then merged into one array of 500 real 
numbers. Partial output is illustrated in Fig. 1. 



118 DEF FM8<C>«9BS<C>-INT<ftBS<C>>*1.9E-8 

!§! SIP fSSJiJlIgKJStSl^SJSSJiJlffKS^.I.caGNKO^l^tKT^AWCD,,* 

149 DEF FNO<C>-$GNn9*FNfUC>-l>*INTf9.3*1999999*FNA<19iFN«<C>>> 

138 PEF FNC<C>-!NT<flBS<C:0*SGN<C> 

168 DIN HC2M)fNl(2ee>,H2<288) 

178 M-8 

188 R-RHO(-l) 

198 Z- 1999998 

208 FOR 1-1 TO 288 

218 2— Z 

228 Hl<I)«INT(RHO(l)t2> 

238 M2<I>«lNT<RMO<l>*Z> 

248 NEXT 1 

238 FOR 1-1 TO 288 

268 0-H<P 

278 N<l>«FN9<NKI>> 

289 0-M<I) 

298 N(I>-FHC(N2<I>> 

388 NEXT I 

318 PRINT "fiSC 

328 DELETE N1.N2 

323 DIN NK288),N2<288> 

339 FOR I"i TO 288 

349 NKI>-FM6<N<1>> 

339 N2<I>-FNO<N(I)> 

369 NEXT I 

379 PRINT "«G" 

388 END 



The second routine packs the integers as they're input, 
first Nl (statements 230-250) and then N2 (statements 
260-280). Once the real number array is completed, either 
Nl or N2 may be changed without re-computing the 
other. Figure 2 shows random generation of Nl and N2 
using the second routine, and the consequent output by 
changing Nl only through deletion of statement 260-280 



and running from line 210. Figure 3 repeats this process, 
but changes N2 only. 



N1 
















-148669 




492183 




-969948 




643169 




-948369 




68373 




-935443 




148942 




-334638 




929948 




-316749 




482861 




-887424 




488469 




-932989 




983838 




-69929 




143861 




-631331 




317737 




-4C4439 




49393 




-117673 




493391 




-661129 




93734 




-379642 




333921 




-796499 

N2 




988369 
489883 




-571236 
-473883 




824686 
68713 




-87777 




-483666 




97823 




-284454 




732743 




-436177 




37978 




-29368 




423793 




-333339 




462189 




-626662 




413676 




-368811 




372686 




-13186 




788173 




-634777 




969183 




-339661 




339363 




-268461 




718938 




-948991 




66773 




-241939 

N 

-148669. 




217464 




-68729 




239998 




999778 


492183. 


2489 


-969948. 


847388 


643169.296972 




-849369. 


949367 


68373.2897823 


-933443. 


929443 


148942.273273 




-334638. 


943619 


928949. 


283787 


-316749. 


982937 


482861.24237 




-887424. 


§3335* 


488469. 


246218 


-932989. 


862666 


983838.241568 




-69928.836881 1 


143861. 


237269 


-631331. 


891319 


317737. 2788t7 




-464439. 


963478 


49393.2968195 


-117673. 


833866 


483391.253936 




-661829. 


926846 


93734,2718938 


-379642. 


994899 


353921.296677 




-796499. 


824193 


888369. 


221746 


-371236. 


996873 


924686.223999 




DECODE 


M 


492193 




-969948 




(43169 




-149669 






-848369 




68373 




-933443 




149942 




-334638 




929949 




-316749 




492961 




-887424 




488469 




-952989 




985939 




-69928 




143861 




-631331 




317737 




-464439 




49393 




-117673 




49339t 




-661829 




93734 




-379642 




353921 




-796499 




888369 




-371236 




824686 




DECODE 


N2 














-87777 




489893 




-475883 




68713 




-483666 




97e23 




-294434 




732745 




-436177 




37879 




-29368 




423793 




-533339 




462193 




-626662 




415676 




-36991 1 




3"»2686 




-13186 




788173 




-634777 




968183 




-338661 




359363 




-263461 




71993S 




-948991 




66773 




-241939 




217464 




-6872? 




239988 





Fig. 1. N1 and N2areshown before being-merged into one array 
(N). N illustrates the packing routine result. The decoded 
arrays depict the integrity of the routine. - 



189 IMIT 

118 DEF FM«<C>-«8S<C)-IMT<ftB3<C))*t .8E-8 

129 DEF PHe<C>-SGH^C*9.1>«XA8S<C>*FN«rO)> . , , .« ^.s, 

139 OEF FMC<C>-SGN<D*9. l>*<8BS<Otl.8E-7*8. 1 *<SGNCC >♦ 1 )*INT<A8S<0) ) > 

149 D€F FHO<C>-$CH<19«FNA<C>-i)*INT<9.5*1999ee9*FNA<l9*FNA<C>>> 

158 OEF FNE<C>"[NT<ABSCC)>tSGN<C> 

169 DIM H<3> 

179 H-9 

189 R-*H0<-1> 

t 90 "** 1 flfll£tldQ 

289 PPI #32: USI ■3X2<9«*>t7A2<9A).-J'Hl","N2",-H<X>*, , Hl DECOOE",' H2" 

219 F0« 1«1 TO 5 

229 Z— Z 

239 Hl-IHT<*HO<l)«2> 

249 D-MU> 

239 N<I)*FM8<M1> 

268 N2«INT<RW0<1 >tZ> 

279 D-N<I> 

299 H(1)«FMC<N2) 

299 N3-FHECH<D) 

399 N4-FN0<N<!>> 

318 PR1HT 932: USING 

329 HEXT I 

339 END 



2<90)90.7D2<9D)":N1,N2,N<I),N3,N4 



( 



) 



Ht 


N2 


N<I> 




Nl DECODE N2 


-636981 


-663999 


-636881. 


8663998 


-636881 


-663989 


398792 


28762 


399792 


2928768 


398792 


28762 


-511926 


-37593 


-511826 


8837588 


-511826 


-37383 


928238 


548988 


928238 


2548889 


928238 


548888 


-177612 


-479969 


-177612 


8478978 


-177612 


-478969 


DEL 269, 289 












RUN218 
543979 


-479969 


543978 


8663998 


543978 


-663989 


-436839 


-478969 


-436839 


.2826769 


-436839 


28762 


711657 


-479969 


711657 


.8837589 


711657 


-37583 


-997196 


-478969 


-997196 


.2548888 


-997196 


548888 


699221 


-478969 


698221 


.8478978 


698221 


-479969 



Fig. 



2. The first run shows the integers as they've been input, 
packed and decoded. In the second run, N1 array has 
been changed, packed and decoded. 



Nl 


H2 


N(I> 




HI DECODE H2 


-581295 


-583997 


-581295 


9593919 


-581295 


-593997 


271969 


896494 


271969 


2896499 


271969 


896484 


-942176 


-949438 


-942176 


9849449 


-942176 


-849438 


617385 


979883 


617395 


2979888 


617385 


979883 


-264712 


-128915 


-264712 


9128929 


-264712 


-129915 


DEL239.259 












RUN218 
-264712 


924541 


-581295 


2924549 


-581295 


924541 


-264712 
-264712 


-451348 


271969 


8451359 


271969 


-451349 


551745 


-942176 


2551758 


-942176 


551745 


-264712 


-958616 


617385 


.8958629 


617385 


-959616 


-264712 


553119 


-264712 


.2553119 


-264712 


553119 



( 






Fig. 3. Deleting statements 230 through 250 allows N2 only to be 
changed. 
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4907 Data File Storage 

by Chuck Eng and Ed Mitchell 
Tektronix, inc. 

The 4907 has four data file structures: 

Binary random access 
Binary sequential access 
ASCII random access 
ASCII sequential access 

(This discussion does not include ASCII and binary 
program files.) 

Both the random and sequential files have the same 
physical structure (256-byte blocks), but random access 
files are broken down into logical records. These logical 
records have pointers to the beginning of each record. 



ASCII Random Access Files 

ASCII random access files must be intialized. That is. 
each record in the file must be completely filled before the 
next record can be accessed. A quick routine to do this is 
shown on page F-2 of the "4907 File Manager Operator's 
Manual/' Notice that one byte of each record is allocated 
for the CR; therefore, ASCII random records are 
initialized with a string of record length minus 1 byte (the 
carnage return is placed in the last byte). 

Printing of ASCII random records must be done ac- 
curately. Record boundaries are not detected when 
ASCII records are printed to or input from. If there is 
more data than record space, the data will print over the 
next record. And, when a file is opened, and an input 
operation is executed that brings in more data items than 
contained in one record, the following record(s) will be 
input. 

The 4907 dynamically extends files. As ASCII random 
files are extended, the records must be completely filled or 
subsequent records cannot be accessed. If you are letting 
the 4907 automatically extend your ASCII random file, 
be sure the data string length equals record length minus 
1; pad the data string with blanks if necessary. 



Binary Random Files 

While Binary random access file records don't have to be 
initialized in the same manner as ASCII (completely 
filled), something must be written to a binary record 
before the subsequent record can be accessed. The above 
mentioned routine on page F-2 writes 3 blanks to each 
binary record. 

Record boundaries are detected on binary writes and 
reads; therefore, if too much data is written or read for 
the record size, an error message is generated. 



Storage Space 

Data cannot be added to random records; updating a 
record requires rewriting the entire record. Also in- 
dividual random records cannot be enlarged. So knowing 
data storage space requirements is important. 

Both sequential and random access files are expanded 
automatically as space is required. Random expansion 
records are the same length as those originally created. 
Sequential file expansion is in units of 256 byte blocks. 

The following table capsulizes the storage information: 





4907 DM* File 


Storage 




Binary 




ASCII 


Record 
Initialization 




Randorr 
No. but 

filled 
in order 


Sequential 

j N/A 


j Random 
' minui 1) 


j Sequential i 
j N/A | 

I ! 


Strings: 

Overnead: 

Per cnaract 




4 bytes 

plus t 
byte per 


: 5 byle, 
per string 


1 byte 
record 


; 1 byte '■, 
j per string 


sr • 


1 byte 


1 byte 


1 byte 


1 byle 


Numeric Can: 
Qvernea-a: 




1 byte 
oer record 


1 byte 


1 bvte 
per record 


1 bvte 
1 byte 




9 bytes 


9 byte, 


1 byle 


. End or Record 
' Detection 




v.. 


N, A 


No 


N/A 


' End ol Fue 
\ Marts 




Ye, 


; Y «* 


Yes 


Yes 





Coordinate Transformation 

by James R. Umdenstock 
City of Tulsa, Oklahoma 

The City of Tulsa is presently assembling a graphic data 
system that includes all major buildings, streets, water 
and sewer lines, address centroids (building centers) and 
the like. This will be a major data system for use by all city 
departments. 

One of the problems associated with constructing such a 
data base is that separate and detached surveys and maps 
will meet harmoniously, without gaps or overlaps. 
Therefore, we have developed a routine which converts 
points on the digitizer to state plane coordinates. 

A map may be placed anywhere on the Summagraphics 
digitizer table interfaced to the 4051 Graphic System. As 
the ground points are digitized, the 4051 quickly converts 
them to state plane coordinates and stores them on tape. 
The data is then transmitted to the host computer over the 
Option 1 Data Communications Interface. 

Since state plane coordinates are an established and 
understood system, this is a very practical program for 
land mapping use. 
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77i? /u?/rfl/ un/r number for ihe du>itt:sr is S. 

This printout is from the host computer, usm? the Option I. 



Data Transfer Through the RS-232 

by Mark Mehall 
Tektronix, Inc. 
Chicago 

Two small programs allow one user (User 1) to control 
tape-to-tape transfer of data to or from another 4051. 
This is especially helpful if the other 4051 user (User 2) is 
unfamiliar with data communication procedures. 

Preparation 

Each user connects their Option 1 to their modem, 
through the RS-232 cable supplied with the 4051. Both 
modems are set either to full duplex or to half duplex; the 
4051s and the modems are then powered up. 



188 REN PROGRAM TO SET 4831 OPT • I ™»*«TERS 
118 REH FOR TAPE TRANSFER TO ANOTHER 4831 

138 RENNET Lf TO CTRL-l (HEWPAGE) 

is! t*H C SET l ji TO CTRL- J (LINEFEED) 

\\% R« C SET 1 SJ TO CTRL-G (BELL) 

ill SK'SEftlMT FILE TO 8 

l?2 £ot2t iti- 4831 TO 4831 TAPE TRANSFER" \ J«IJ» . 

22? PR MT -THE OTHER 4831 USER SHOULD USE THE DEFAULT PARAMETERS,' 

lis PRINT "AND SHOULD BE IN TERMINAL HOOE.'U* 

24* REM INITIALIZE THE COMM. INTERFACE 

III REH L SET H TSTRIM TO MATCH DEFAULT RSTRIH PARAMETERS 

278 REM SET Rf TO CTRL-R <DC2> 

288 R*-CHR(t8) _ ,„„„ N 

298 REM SET T* TO CTRL-T <DC4> 

308 Tt»CHR(28) _ AT . 

318 REM SET DS TO CTRL-D (EOT) 

328 D**CHR(4> 

3 34 3 S ^m L set S t R crlf ,R tS'supp?ess CARRIAGE RETURHS 

III SeN L SET C RCRLF 8 T0' PRINTED CONTROL CHARACTERS 

III rIm^iaIIzeIne interface 
ill P r?m M In!?!auze file number 

J 2 8 PRiSt "HOW MANY FILES ARE BEING TRANSMITTED? -»C«I 
438 INPUT F 

222'BEM FTio T THE TAPE FILE TO BE TRANSFERRED 

ill PRIHT^ShJtSaPE FILERS TO BE JRANSMI TTED* - 
478 PfilHT 'THE LAST FILE MAS MFll" 'iGtl 
488 INPUT Fl 
498 FrNO Fl 

518 REM H SEHO INSTRUCTIONS TO THE OTHER USER 

328 REH SET E* TO CTRL-C (ESC) 

338 £S«CHR(27> .„-, Tn 4fl «, TflP e TRANSFER" 

in KSK'KS-SSjMl^U.. Function K.J'fi IShtftSITo HnS tK fil.- 

lll PRINT #48: J* 'to .tort the data. Enter thi ftH nurtir. 

5S2 dotwt #4fl : J* -Prt»« RETURN. Th«n or«s» Function Key 3.',C8 

III RISt SlSijIljSrTh. i^or T .tlo; o; ,our ,cr„n -ill ov.rormt, 

IIS Sir^^r^^NiM^SN-FROM^HE OTHER 4.SI (SNDSTG) 

618 INPUT 848: A* 

628 REM DO THE TRANSFER 

8! KBr'SKF ;.«.""«.',„„ 

658 PRINT t48:J«U««J*t"Fll« r«c«tv«d. 

IIS SliHT I t48:Jf.-Final fl1« r«ctiy«d. 
688 PRINT t49:Jf»'Pick up your hcads«t. 
698 END 



iGiU* 



'.Gt 



Fig. 1. Routine to control transfer to another 4051 over the 
Option 1, 

i a* im »«oeRA« TO SET 4851 OPT. 1 PARAMETERS 
118 SIS ^W TAPE TRAHSFER FRO* ANOTHER 4851 
US REM SET L* TO CTRL-L (HEWPAGE) 

148 REN^Vji TO CTRL- J (LINEFEED) 

i!S REM C 8ET 1 gJ TO CTRL-G (BELL) 

\ll graftlMT FILE TO 8 

11. pIISt ^TNE OTHER 4831 U..«ioKD 4 !Ii ^SB^^iSiSf.- 

| 2 J RIST 'ISSKSSoiriN TERMIHAi . NODE.-.Jt 

238 REM INITIALIZE THE CONN. IHTERFACE 

258 REN L SET"RSTR"lN TO MATCH DEFAULT T8TRIN PARAMETERS 

268 REM SET Nt TO CTRL-t <NUL> 

I?! rIm^S. TO CTRL-S <DC3) 

!IS K£S$i TO CTRL-D (EOT) 

?IS a?2?'iSIcHfc H T& $ 8fcRS NOTHING AS SNDSTRC 

HI rI^ET^CRLf' TO' PANTED CONTROL CHARACTERS (FOR LINE FEEDS) 

13 REN L SET C FRCR'(F0fecE CARRIAGE RETURN) TO 8 (NO) 

US r^niIV&i.zeVhe'interface 

4*8 PRINT •HOW 3 MANY FILES ARE BEING RECEIUED? "»GSI 

428 INPUT F 

438 FOR I"l TO F 

:s: s^t's^iSAWAPS'HLriiToSKEiui M m - 

468 PRINT -THE LAST FILE HAS MF1I' MCII 

478 INPUT Fl 

488 FINO Fl 

388 REM H SENO INSTRUCTIONS TO THE OTHER USER 

318 REM SET Ef TO CTRL-C (ESC) 

328 E»-CH*(2?) ^ .-«. TQ 485l TAPE TRANSFER' 

3! pTlNT = jJ "Us. Function K.l 9 13 1!mH3) to Hnd th. 111." 

i I ft ..: "siattr'TRi; Bis «s«i : ajr-- 

I^rW^C^^ 
618 call "dtrecu" 

S3 »iBl ;jft5.?5SfS«Wi. tr<8»itt.d. MGtu* 

658 PRlNT 1 t48:J«lJIU»» 'Final flit t™"«"*JJ* d - "' 
668 PRINT t48:JtrPicN up your headset. iGf 
678 ENO 

Fig. 2. Routine to control transfer from another 4051 over 
the Option 1. 
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The user who is receiving the data marks a tape for the 
number and size of files required for the incoming data 
User 1 loads the applicable program below (sending or|^ 
receiving) into 4051 memory. User 2 types in CALL 
"CM1N1T" on the second 4051 and presses the RETURN 
key, then types in CALL "TERM1N" followed by a 
RETURN. 
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Data Transfer 

Establish telephone contact (either one can dial the 
other). One user sets their modem to answer (ANS) mode 
and lays their headset into the modem cradle (note where 
the cord end is placed). The other user sets their modem to 
originate (ORIG) and listens for the frequency signal; 
then sets their headset into the modem cradle. When 
contact is established, the carrier light on the modem will 
come on; the 4051 will stop flashing its lights. 

Now the program in User 1 4051 memory is run. Users 
each respond to the prompts on their 405 1 screen, and the 
data transfer is carried out. When transfer is completed, 
load one of the files into the receiving 4051 to verify. 

A related and informative article is contained in TEKni- 
ques Vol. 1 No. 4, "4051s Talk To Each Other." 



Changing 4051 Parameters to Read 
Different Tape Formats 

by Aaron Eisenbach 
Tektronix, Inc. 
Baltimore, MO 

The 405 1 can easily adapt its ASCII input format 
requirements to the ASCII output formats used by 
different peripheral devices. A customer recently logged 
data on the Tektronix 4923, and then read it into the 405 1 
using the following routine. 

Statement 120 changes the status byte for the internal 
magnetic tape unit so it can read the 128 byte length, no 



checksum, no header format of the 4923. The next steps 
determine the record separator, end of file mark, and 
incoming character(s) to be deleted. After the alternate 
parameters are input, statement 230 instructs the 
microprocessor to use these when the "%" sign is used in 
place of the "@" sign on INPUT, OLD or APPEND 
commands. 

The rest of the routine reads the tape and resets the status 
bytes. 



let 

119 
129 
139 
149 

139 
1£8 



199 
299 
219 
229 
239 
249 
239 
269 
278 
289 
299 
389 
319 
329 



INSERT DATA TAPE AHO PRESS CRETURHJ' 



PRINT m lQt 

INPUT Tt 

PPTHT t33,9: 1,1,1 

PRIHT "JJCI USE THE DECIMAL EQUTUALENTS OF THE' 
"*'*- * ASCII CHARACTERS FOR THE FOLLOWING INPUTS" 
JJJG* RECORD SEPARATOR ? : '\ 



CHARACTER TO BE DELETED ? (ENTER 129 IF NONE) 
DATA FILE • i : ') 



PPIHT 

PRIHT 

IHPUT Al 

PRIHT "Jfit END OF FILE HARK ? 

IHPUT A2 

PPIHT 'JQt 

IHPUT A3 

PRIHT *JC< 

IHPUT F 

PRIHT t3?,9:Al,A2,AJ 

PAGE 

OH EOF (9) THEN 399 

FIHO F 

IHPUT *33:«* 

PRIHT At 

GO TO 2?9 

PRIHT 137,26:9 

PRINT #33.9:9,9,9 

PRIHT 'JJfiDOHE* 



Caution should be used when specifying an alternate 
record separator. If an ASCII data string contains both 
Carnage Return characters and the alternate record 
separator character, logical records could be lost. To 
avoid this, specify the character to be deleted (statement 
190) as "13." This will delete all incoming Carriage 
Returns but will read all logical records. 

For a complete discussion on magnetic tape status 
parameters, see the "4051 Graphic System Reference 
Manual," pages 2-19 to 2-21. Check pages 2-25 to 2-30 for 
detailed information on processor status parameters. /s^ 



Basic 
Bits 




Program Byte Counter 

by Leo J. LaFrance 

New Mexico State University 
Las Cruces, NM 

This routine quickly determines the minimum space 
required by an ASCII program file. It analyzes a file 
already on tape and, if requested, will re-mark the file and 
re-store the program. Note that the file should be the last 
one on the tape. JgD 



LIS 

188 INIT 

118 CI-CHR(13> 

128 DIN Ai(HEMO«Y-388> 

138 **■•' 

148 OH EOF <8> THEH 238 

158 PRIHT 'LIn*crt tape and input nunb«r of filt ' 

168 PRIHT "to be an«lyz«d. *; 

178 IHPUT F 

188 FIHO F 

198 IHPUT f33:R$ 

288 R**RUCS 

218 Af-REP(R$,1+LEN<A«>,8> 

228 GO TO 196 

238 PRIHT 'JJASCII fil« rtquirci '|LEM<AI>|- byttf. 

248 PRIHT 'Minimi* is 768 byttf.* 

238 PRIHT "If you wont tht file rt-siztd, sntcr ■ 

268 PRIHT "YE§.' CAUTI0H: YOUR TAPE HILL BE "I 

278 PRIHT "RE-HARKED. "1 

288 IHPUT Gl 

298 IF GSO-YES' THEN 348 

38* FIHO F 

318 HARK 1,LEH<A$)*1 

328 FIHO F 

338 PRIHT t33:AI| 

348 EHO 
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4051 Applications Library 
Program Abstracts 

Order 

Documentation and program listings of each program are 
available for a nominal charge. Programs mil be put on tape for a 
small recording fee per program plus the charge for the tape 
cartridge. One tape will hold several programs. (The program 
material contained herein is supplied without warranty or 
representation of any kind. Tektronix, Inc. assumes no respon- 
sibility and shall have no liability, consequential or otherwise, of 
any kind arising from the use of this program material or any part 
thereof J 

Domestic U.S. Prices: 



Documentation and listings 
Recording Fee 
Tape Cartridge 



SI 5 per program 
2 per program 
26 per tape 




ABSTRACT NUMBER: 51/00-0904/0 

Title: Business & Accounting Formulas 
Author: Dr. P.C Holman 

University of Wisconsin 

Stevens Point, WI 
Memory Requirement: 32K 
Statements: 7698 
Files: 19 ASCII Program 

A turorial program containing formulas, statistics and 
tables in the following areas: 

1. Simple Interest Formulas: A set of eight formulas 
used to compute simple interest. 

2. Compound Amount Formulas: A set of programs 
determining the dollar amount that an account or 
loan is worth now, or would be worth at some future 
time. 

3. Annuities: A set of programs determining the value 
of an annuity. They handle any kind of annuity, as 
well as determining what one would have to pay if 
one set up an annuity. 

4. Statistics; Averages and Variation Formulas: A set 
of programs for solving statistics most commonly 
used in business. 

5. Statictics; Sampling: A set of programs determining 
statistical sampling parameters. 



Contribute 

Contribute one program to the Library and receive three in 
exchange. Send in the membership card from your 4051 Graphic 
System Reference Manual to get the details. Or call us (503)682- 
3411, ext. 2618. 

Forms 

Please use the Applications Library Order Form. Order forms 
are included in the Membership Packet and are available from 
your local Tektronix Sales Engineer. 

Outside U.S. 

Program contributions or orders outside the U.S. must be 
processed through the local Tektronix sales office or sent to one 
of the Libraries serving your area. See Library Addresses section. 



6. Statistics: Correlation: A set of programs deter- 
mining the statistical correlation between sets of 
data. 

7. Statistics: Index Number Formulas: A set of 
programs determining the index values for several 
sets of data. 

8. Statistics; Time Series Formulas: A set of programs 
determining secular trends, seasonal changes, and 
cycles. Used to determine what quantity a firm 
should produce during given periods of time. 

9. Inventory Formulas: A set of programs used for 
inventory assessment. 

10. Depreciation Formulas: A set of programs allowing 
calculation of depreciation. 

11. Finance Section: A set of formulas used for financial 
analysis. 

12. Price Level Adjustments: A set of programs used to 
convert long term liabilities (i.e. depreciation, A P) 
into current dollar values. 

13. Marketing Formulas: A set of programs used to 
calculate the selling price a retailer or wholesaler 
should use to obtain the profit desired. 

14. Cost and Production Formulas: A set of programs 
used to determine the cost and production 
relationships of various products and payroll 
billings. 

15. Ratio Analysis Formulas: A set of programs presen- 
ting basic accounting ratios as well as time periods 
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for such things as production and inventory turn- 
over, and collection periods for various accounts. 

16. Single Entry Formulas: A set of programs used to 
determine income statement entries for sales, 
purchases, expenses, and inventories. 

17. Miscellaneous Formulas: A set of programs that are 
useful in business, but that do not belong in the 
major groupings previously described. 




ABSTRACT NUMBER: 51/00-0905/0 

Title: "Y" Axis Graph— 12 Month Format 

Author: Robert Piikington 

AT&T 'Long Lines 

Bedminster, NJ 
Memory Requirement: 24K 

Peripherals: Optional— 4610/4631 Hard Copy Unit 
Statements: 568 
Files: 1 Program 
4 Data 

A solid line curve, a dashed line curve, shaded bars, or any 
combination of the three can be created easily on a graph 
with titles and labels by using this monthly scale 
adjustable "Y" axis graphing program. 

All titles and labels are automatically spaced and centered 
around the axis. Up to four main title lines can be entered 
with one "X" axis title, a three position "Y" axis title, and a 
legend label for each plot curve. The user can select bar 
shadings as well (empty bars, solid fill or cross hatch). A 
parameter and data listing can be accessed before or after 
the graph is diplayed. 

Data for all three plot modes can be added, deleted or 
changed. All data and parameters can be saved or 
retrieved from pre-marked binary files on the same 4051 
data cartridge. 

Limitations: "Y" axis tic labels up to six characters using 
whole numbers and seven characters using decimal 
numbers including decimal point and dollar sign. The 
scales must be positive numbers. The size and position of 
the graph on the screen is constant and stationary. 



"WIN TITLE LIMC A 
HAIM TITLE LIMC 8 
HAIM TITLE LIKC C 
AAIM TITLE LINC D 




L«fcnd Lttv« A 
Li««nd Liik S 
Leicnd Li«« C 




ABSTRACT NUMBER: 51/00-0907/0 

Title: Bargraph II 

Author: Mallory M. Green 

U.S. Dept. of H.U.D. 
Washington, D.C. 
Memory Requirement: 32K 
Peripherals: 4662 Plotter 

Optional— 4907 File Manager 
Statements: 1493 
Files: 4 ASCII Program 
4 Binary Data 

A program designed to generate professional horizontal 
or vertical formatted bar graphs in a simple interactive 
manner. 

Features of the program are: 

1. Horizontal and vertical bargraph formats. 

2. User-prompted keyboard entry of all titles, labels and 
data. 

3. Interactive modification of titles, labels, or data via 
user keys. 

4. Storage of complete chart descriptions on either tape 
or disc files for future modification and plotting. 

5. Output drawn on either the screen or 4662 Plotter. 
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6. 4662 Plotter outputs in one or more colors. 

7. Automatic layout of centered and proportional 
charts. 

8. TIMESERIES II and BARGRAPH II are fully 
compatible. 



XYZ CORPORATION 
FOUR YEAR COMPARISON CE OPERATIONS 
ACTUAL TIME LOGGED ON TERMINAL LOG 

1975 HH 



'976C 
!978 r 
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ABSTRACT NUMBER: 51/00-0906/0 

Title: Timeseries II 

Author: Mallory M. Green 

U.S. Dept. of H.U.D. 
Washington, D.C. 
Memory Requirement: 32K 
Peripherals: 4952 Joystick or 4662 Plotter 
Optional— 4907 File Manager 
Statements: 1157 
Files: 3 ASCII Program 
4 Binary Data 

A program designed to generate professional timeseries 
charts in a simple interactive manner. 

Features of the program are: 

1. Can draw up to 6 lines for up to 35 time periods. 

2. Time periods such as seconds, minutes, hours, days, 
weeks, months or years can be used. 



3. User-prompted keyboard entry of titles, labels, and 
data. 

4. Allows interactive modification of titles, lables, and 
data via user keys. 

5. Chart descriptions can be stored on either tape or disc. 

6. Utilizes all 20 user-definable keys for maximum 
flexibility. 

7. TIMESERIES II and BARGRAPH II are fully 
compatible. 



NEW YORK STOCK EXCHANGE PRICE INDEX 
Source Wasnington Post 



NYSE! PRICE INDEX: 



... I 
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OCTOBER 29 THRU DECEMBER 2 1978 




ABSTRACT NUMBER: 51/00-0908/0 

Title: Regular Plot 
Author: R.J. Reimann 
Memory Requirement: 32K 
Peripherals: 4662 Plotter 

Optional— 4051 R05 
Statements: 862 
Files: 1 Binary Program 
1 Binary Data 

A general graphics program developed for industrial 
market analysis. It provides line and bar plots with 
regularly spaced X-axis entries. Features include: 

1. Auto-scaling of the Y-axis. 
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2. Line addition/deletion capability. 

3. Labels and data correction. 

4. Allowance for negative data. 

5. Aligned data tables. 

6. Data storage/recall. 

7. Linear regression. 



6. Save and retrieve plots on either cartridge tape or disc 
in the same program. 

7. Edit text at any time. 

8. Alter retrieved plot and save new plot in same or 
separate file. 

9. Graphics symbols available: Line, Box, or Diamond. 
Draw anywhere on plotter surface. 
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ABSTRACT NUMBER 51/00-9531/0 

Title: Slidemaker II 

Author: John R. Carter 

Tektronix, Santa Clara Annex 
Memory Requirement: 32K 
Peripherals: 4662 Plotter 

Optional— 4907 File Manager 
Statements: 679 
Files: 1 ASCII Program 
1 ASCII Text 

Slidemaker II offers a highly versatile tool for creating 
professional and sophisticated presentation aids. 

The main features are: 

1. Standard type sizes selected with a single variable. 

2. Tab selections that operate like a typewriter. 

3. Variable type sizes and color changes possible on the 
same line of type, including choice of bold or normal 
type on the same line. 

4. Fast line centering. 

5. Input a whole page of text in one operation, with only 
one pen setting at the beginning. 



SLIDEMAKER II 



M _L H I i U 



/A TOR IN 



NEW ! FEATURES NEVER BEFORE SEEN IN SLIDES 

EXCEP T T HOSE CREATED 3V SPECIAL GRAPHICS 
ARTS EQUIPMENT 



AVAILABLE NOW TO ALL 405 1 USERS 



TEKTRONIX Announces 4050 
Catalog: Vendor Supplied Software 
and Services 

TEKTRONIX will be producing a catalog of software 
and programming services for the 4051 Graphic Com- 
puting System available from companies and consultants 
not associated with TEKTRONIX. The catalog will be 
sent directly to current 4051 users and to our worldwide 
sales organization. 

Software products will be listed in the catalog by 
application area. Programming services for the 4051 will 
be listed by geographic location. Customers will contact 
the advertiser directly for additional information. 
TEKTRONIX does not endorse or warrant any products 
or services listed. 

Listings are restricted to Software Packages written 
exclusively in 4051 BASIC. 

For a direct avenue to the market for your 4051 software 
products and programming services, complete the enclos- 
ed form and return it to: Catalog Listing, Group 452, 
Tektronix, Inc., P.O. Box 500, Beaverton, OR 97077. 
More forms may be acquired by writing to this address. 
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COMMOTED TO EXCELLENCE 








TEKTRONIX, INC. 
Information Display Group 
Applications Library 
Group 451 
P.O. Box 500 
Beaveiion, Oregon 97005 
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4051 Applications 


Libraries 




Africa, Europe, Middle East 


Canada 


Japan 


405 1 Applications Library 


4051 Applications Library 


4051 Applications Library 


Tektronix International, Inc. 

European Marketing Centre 

"Bavinckstaete" 

Prof. Bavincklaan 5 

1 1 83 at Amstelveen, The Netherlam 


Tektronix Canada Ltd. 
P.O. Box 6500 
Barrie, Ontario 
is Canada L4M 4V3 


Sony Tektronix Corporation 
9-31 Kitashinagawa-5 
Tokyo 141 Japan 

United States 


Australia 

405 1 Applications Library 


Caribbean, Latin America 
and Far East (excl. Japan) 


4051 Applications Library 
Tektronix, Inc. 


Tektronix Australia Pty. Limited 

Sydney 

80 Waterloo Road 

North Ryde, N.S.W. 21 13 


Ms. Bev Brandon, 73-312 
Export Marketing 
Tektronix, Inc. 
P.O. Box 500 
Beaverton, Oregon 97077 
U.S.A. 


Group 451 
P.O. Box 500 
Beaverton, Oregon 97077 
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